home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Technotools
/
Technotools (Chestnut CD-ROM)(1993).ISO
/
lang_oth
/
m2cmp20
/
lmathlib.def
< prev
next >
Wrap
Text File
|
1988-11-19
|
598b
|
27 lines
DEFINITION MODULE LMathLib0;
(* (C) Copyright 1988 Fitted Software Tools. All rights reserved. *)
(*
LONGREALs version of the MathLib0 module as defined in the book
"Programming in Modula-2" by Niklaus Wirth.
*)
PROCEDURE sqrt( x :LONGREAL ) :LONGREAL;
PROCEDURE exp( x :LONGREAL ) :LONGREAL;
PROCEDURE ln( x :LONGREAL ) :LONGREAL;
PROCEDURE sin( x :LONGREAL ) :LONGREAL;
PROCEDURE cos( x :LONGREAL ) :LONGREAL;
PROCEDURE arctan( x :LONGREAL ) :LONGREAL;
PROCEDURE real( x :LONGINT ) :LONGREAL;
PROCEDURE entier( x :LONGREAL ) :LONGINT;
END LMathLib0.